home *** CD-ROM | disk | FTP | other *** search
/ Ahoy 1987 November / Ahoy_Magazine_87-11_1987_Double_L.d64 / Smooth Move (.txt) < prev    next >
Encoding:
Commodore BASIC  |  1987-01-01  |  118 b   |  7 lines
  1. 5 rem smooth move
  2. 10 print"[147]"
  3. 20 g$="[165][212][199][194][200][217][167]"
  4. 30 for g=1 to 37: for a=1to7: a$=mid$(g$,a,1)
  5. 40 printchr$(19)tab(g)" "a$
  6. 50 next a:next g
  7.